# name : Generates all permutations in macro
# key : allperm.macro.
# contributor: Shuguang Sun
# --
%macro test;
   %let x1=ant;
   %let x2=-.1234;
   %let x3=1e10;
   %let x4=hippopotamus;
   %let nperm=%sysfunc(perm(4));
   %do j=1 %to &nperm+1;
      %syscall allperm(j, x1, x2, x3, x4);
      %let jfmt=%qsysfunc(putn(&j, 5.));
      %put &jfmt:   &x1 &x2 &x3 &x4 sysinfo=&sysinfo;
   %end;
%mend;